﻿Imports System.Data.SqlClient

Public Class EditWorkshop
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim con As New SqlConnection
        Dim cmd As New SqlCommand

        'change this to get our Oracle
        con.ConnectionString = "Data Source=localhost;Initial Catalog=invsystem;Persist Security  Info=True;User ID=s12setwin;Password=JDLOAF"

        'open a connection to the db
        con.Open()

        'send command to the database
        cmd.Connection = con

        'set the SQL as the command
        cmd.CommandText = "SELECT"

        'read the info returned from the sql
        Dim lrd As SqlDataReader = cmd.ExecuteReader()
        While lrd.Read()
        End While
    End Sub

    Protected Sub saveButton_Click(ByVal sender As Object, ByVal e As EventArgs) Handles saveButton.Click
        Dim con As New SqlConnection
        Dim cmd As New SqlCommand

        'change this to get our Oracle
        con.ConnectionString = "Data Source=localhost;Initial Catalog=invsystem;Persist Security  Info=True;User ID=s12setwin;Password=JDLOAF"

        'open a connection to the db
        con.Open()

        'send command to the database
        cmd.Connection = con

        'set the SQL as the command
        cmd.CommandText = "UPDATE"

        'read the info returned from the sql
        Dim lrd As SqlDataReader = cmd.ExecuteReader()
        While lrd.Read()
        End While
        Response.Redirect("ManageWorkshops.aspx")
    End Sub

    Protected Sub cancelButton_Click(ByVal sender As Object, ByVal e As EventArgs) Handles cancelButton.Click
        Response.Redirect("ManageWorkshops.aspx")
    End Sub

    Protected Sub viewEnrolemntButton_Click(ByVal sender As Object, ByVal e As EventArgs) Handles viewEnrolemntButton.Click

    End Sub
End Class